﻿Public Class Edit
    Private rowcount As Integer
    Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged

    End Sub

    Private Sub PictureBox2_Click(sender As Object, e As EventArgs) Handles PictureBox2.Click
        Clipboard.SetText(TextBox1.Text)
    End Sub

    Private Sub PictureBox1_Click(sender As Object, e As EventArgs) Handles PictureBox1.Click
        Form1.UpdateGrid(rowcount, TextBox1.Text, TimeLabel.Text)
        Me.Close()
    End Sub

    Private Sub Edit_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        rowcount = Form1.RowCount
        TextBox1.Text = Form1.ClipGrid.Rows(rowcount).Cells(1).Value
        TimeLabel.Text = Form1.ClipGrid.Rows(rowcount).Cells(2).Value
    End Sub
End Class